function s = ask(data,symbolRate,sampleFreq)

NperBytes=round(sampleFreq/symbolRate);
s=repelem(data,NperBytes);

% s = zeros([1,length(data)*sampleFreq/symbolRate]);
% for i=1:sampleFreq/symbolRate
%     s(i:sampleFreq/symbolRate:end)=data;
% end